home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Softwarová Záchrana 3
/
Softwarova-zachrana-3.bin
/
Xteq X-Setup
/
xqdcXSP-Setup-EN.exe
/
{app}
/
plugins
/
XQ CD AutoStart Options.xpl
< prev
next >
Wrap
Text File
|
2003-08-01
|
1KB
|
45 lines
"FILE"="Xteq Systems X-Setup Plugin 6.0"
"TYPE"="6"
"COUNT"="1"
"UIPATH"="System\AutoPlay\Audio CDs"
"NAME"="AutoPlay Audio CDs"
"VERSION"="1.41"
"OSVERSION"="11111"
"LANGUAGE"="VBScript"
"TEXT 1"="Play audio CD-ROMs automatically"
"DESCRIPTION 1"="If you normally insert a CD in your CD-ROM-drive, it starts playing the CD using the CD Player (AutoPlay)."
"DESCRIPTION 2"="If you do not like this behavior, you can change it here."
"DESCRIPTION 3"="Note that this option requires "Auto-Insert Notification" for your CD-ROM-drive enabled."
"AUTHOR"="Xteq Systems"
"CONTACTURL"="http://www.xteq.com"
"COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
"COMMENT 2"="Thanks to totalXS for his help!"
Sub Plugin_Initialize
s=RegReadValue("HKLM\Software\Classes\AudioCD\Shell\@")
if s="play" then SetUIElement 1,true
End Sub
Sub Plugin_CheckData(ElementIndex)
End Sub
Sub Plugin_Apply(ElementIndex,ElementSubIndex)
b=GetUIElement(1)
if b=true then
Call RegWriteValue("HKLM\Software\Classes\AudioCD\Shell\@","play",1)
else
Call RegWriteValue("HKLM\Software\Classes\AudioCD\Shell\@","",1)
end if
'Restart
Call IndicateSettingChange()
End Sub
Sub Plugin_Terminate
End Sub